home *** CD-ROM | disk | FTP | other *** search
/ HaCKeRz Kr0nlcKLeZ 1 / HaCKeRz Kr0nlcKLeZ.iso / scriptz / screwy.exe / extras.txt < prev    next >
Encoding:
Text File  |  1997-02-19  |  4.1 KB  |  37 lines
  1.  
  2. Link Looker
  3. .On:/.enable #look |  /specho Linklooker on, hit Look to begin scan.
  4. .Off:/.disable #look | /specho LinkLooker off.
  5. .-
  6. .Look:/links | /specho LinkLooker activated, this may take a bit#look start
  7. 364:*: {
  8.   set %Eserv irc.law.emory.edu irc.nol.net irc.cs.cmu.edu irc.frontiernet.net irc.visi.com *.nwlink.com irc.cdc.net irc.mindspring.com ircd.txdirect.net irc.ionet.net irc.psinet.com  *.umn.edu irc.mcgill.ca irc.polymtl.ca elk.nstn.ca irc.magic.mb.ca irc-r.magic.mb.ca portal.mbnet.mb.ca irc.cadvision.ab.ca irc.hookup.net irc.cs.mun.ca eng.yale irc.ais.net *.concentric.net heracles.cris.com  irc.cris.com *.lightning.net services.us *.umich.edu ircd.idt.net *.cerf.net *.stanford.edu *.rutgers.edu  irc.ucdavis.edu irc-w.primenet.com *.blackened.com *.au *.Berkeley.EDU *.washington.edu
  9.   set %Eserv2 irc.vianet.on.ca *.utexas.edu irc.mcs.net irc.cs.rpi.edu efnet.demon.co.uk irc.cnde.iastate.edu irc.voicenet.com irc.gd.gu.se irc.nijenrode.nl irc.df.lth.se irc.bofh.co.uk irc.homelien.no irc.ec-lille.fr irc.ais.net irc-ais.ais.net *.texas.net *.stealth.net *.phoenix.net irc.tech.uh.edu IRC.VoyagerOnline.net opus.bridge.net anarchy.tamu.edu  irc2.magic.ca irc.gate.net irc.sprynet.com *.uci.edu irc.s *.netcom.com irc.netcom.net.uk irc.best.net irc.mo.net irc.idt.net irc2.uiuc.edu irc.uiuc.edu irc.ecn.bgu.edu irc.colorado.edu *.aol.com irc.io.org  irc.sintercom.org irc.digex.net 
  10.   set %Eserv3 opus.bridge.net *.netcom.com irc.netcom.net.uk irc.best.net irc.rift.com irc.eng.yale.edu old-irc.best.net irc-e.primenet.com irc.nwlink.com *.tw *.ac.il irc.ibm.net.il irc.lightning.net piglet.cc.utexas.edu monitor.utexas.edu
  11.   set %tempserver $token(1,91,$parm2)
  12.   set %mserv1 irc.law.emory.edu irc.nol.net irc.cs.cmu.edu irc.frontiernet.net irc.visi.com *.nwlink.com irc.cdc.net irc.mindspring.com ircd.txdirect.net irc.ionet.net irc.psinet.com  *.umn.edu irc.mcgill.ca irc.polymtl.ca elk.nstn.ca irc.magic.mb.ca irc-r.magic.mb.ca portal.mbnet.mb.ca irc.cadvision.ab.ca irc.hookup.net irc.cs.mun.ca eng.yale irc.ais.net *.concentric.net heracles.cris.com  irc.cris.com *.lightning.net services.us *.umich.edu ircd.idt.net *.cerf.net *.stanford.edu *.rutgers.edu  irc.ucdavis.edu irc-w.primenet.com *.blackened.com *.au *.Berkeley.EDU *.washington.edu
  13.   set %mserv2 irc.vianet.on.ca *.utexas.edu irc.mcs.net irc.cs.rpi.edu efnet.demon.co.uk irc.cnde.iastate.edu irc.voicenet.com irc.gd.gu.se irc.nijenrode.nl irc.df.lth.se irc.bofh.co.uk irc.homelien.no irc.ec-lille.fr irc.ais.net irc-ais.ais.net *.texas.net *.stealth.net *.phoenix.net irc.tech.uh.edu IRC.VoyagerOnline.net opus.bridge.net anarchy.tamu.edu  irc2.magic.ca irc.gate.net irc.sprynet.com *.uci.edu irc.s *.netcom.com irc.netcom.net.uk irc.best.net irc.mo.net irc.idt.net irc2.uiuc.edu irc.uiuc.edu irc.ecn.bgu.edu irc.colorado.edu *.aol.com irc.io.org  irc.sintercom.org irc.digex.net 
  14.   set %mserv3 opus.bridge.net *.netcom.com irc.netcom.net.uk irc.best.net irc.rift.com irc.eng.yale.edu old-irc.best.net irc-e.primenet.com irc.nwlink.com *.tw *.ac.il irc.ibm.net.il irc.lightning.net piglet.cc.utexas.edu monitor.utexas.edu
  15.   if ( %tempserver isin %mserv1 ) || ( %tempserver isin %mserv2 ) ( %tempserver isin %mserv3 ) set %missingservers $remove(%mserv1,%tempserver) 
  16.   if ( %tempserver isin %mserv1 ) || ( %tempserver isin %mserv2 ) ( %tempserver isin %mserv3 ) set %missingservers $remove(%mserv2,%tempserver) 
  17.   if ( %tempserver isin %mserv1 ) || ( %tempserver isin %mserv2 ) ( %tempserver isin %mserv3 ) set %missingservers $remove(%mserv3,%tempserver) 
  18.   if ( %tempserver !isin %Eserv ) && ( %tempserver !isin %Eserv2 ) && ( %tempserver !isin %Eserv3 ) { set %extraservers %extraservers %tempserver }
  19.   set %missingservers %mserv1 %mserv2 %mserv3 
  20.   halt 
  21. }
  22. 365:*: {
  23.   if (%missingservers == $null ) { specho There are NO missing servers on EFnet! }
  24.   else { specho Server(s) missing:4 %missingservers }
  25.   if ( %extraservers != $null ) { specho Extra server(s): %extraservers }
  26.   else specho { There are NO Extra servers on EFnet! }
  27.   unset %tempserver*
  28.   unset %extraserver*
  29.   unset %mserv1
  30.   unset %mserv2
  31.   unset %mserv3
  32.   unset %Eserv
  33.   unset %Eserv2
  34.   unset %Eserv3
  35.   halt
  36. }
  37. #look end